-- card: 16079 from stack: in.9
-- bmap block id: 15113
-- flags: 0000
-- background id: 11179
-- name: cun6


-- part 1 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=462 top=306 right=340 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 24317 / 24317
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Go first
----- HyperTalk script -----
on mouseUp
  set lockscreen to true
  go card "tline"
  hide background field "one"
  hide background field "two"
  hide background field "three"
  hide background field "four"
  set lockscreen to false
  visual effect dissolve

  go to card "tline"
end mouseUp




-- part 2 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=425 top=305 right=341 bottom=460
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: right dogear
----- HyperTalk script -----
on mouseUp
  -- this script handles a diagonally divided button, intended to be
  --  a right dogear
  put (item 1 of the clickLoc) - (item 1 of the rect of the target) into x
  put (item 4 of the rect of the target) - (item 2 of the clickLoc) into y
  if (x < y) then              -- click is in upper left
    visual effect wipe left
    play "click"
    go card "cun1"
  else
    visual effect wipe right
    play "click"
    go to previous card
  end if
end mouseUp